home *** CD-ROM | disk | FTP | other *** search
/ Chip: 2001 Haziran / CHIP Haziran2001.iso / prog / haziran / 20 / setup.exe / {app} / plugins / XQ ATI128 4.xpl < prev    next >
Encoding:
XSetup plugin  |  2001-03-28  |  4.1 KB  |  135 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="6"
  3. "COUNT"="3"
  4. "UIPATH"="Hardware\Video Cards\ATI 128"
  5. "NAME"="Other Settings"
  6. "VERSION"="1.02"
  7. "LANGUAGE"="VBScript"
  8. "TEXT 1"="Enable AntiAliasing (better display but slower)"
  9. "TEXT 2"="Enable dithering (better display but slower)"
  10. "TEXT 3"="Enable motion compensation (may increase performance)"
  11. "DESCRIPTION 1"="Some more options for your ATI128 card."
  12. "AUTHOR"="Xteq Systems"
  13. "CONTACTURL"="http://www.xteq.com"
  14. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  15. "COMMENT 1"=" "
  16. "COMMENT 2"="Thanks to CptSiskoX for the settings and the idea."
  17.  
  18.  
  19. '-- ONLY CHANGE THE LINES WITHOUT ' at the beginning !!
  20. '
  21. '*** Xteq Systems "On/Off" Plug-in Template ***
  22. '*** ID_XQ_PT1 V1.00 
  23.  
  24.  ' how many settings are in this file (change "COUNT=" also!) 
  25.  CountSettings=3
  26.  
  27.  ' does this plug-in requires the user to logoff or to restart his PC?
  28.  bRequireLogoff=0
  29.  bRequireRestart=1
  30.  
  31.  ' if this path exists in the registry, the plug-in will be enabled. if it does
  32.  ' not exist, the plug-in will be disable set to ="" to ignore this check and alway
  33.  ' enable the plug-in, regardless if the path exists or not
  34.  sCheckPath="HKEY_LOCAL_MACHINE\Software\ATI Technologies\Driver\ddhal\"
  35.  
  36.  
  37.  ' Settings for Value # 1
  38.  sV1_Path="HKEY_LOCAL_MACHINE\Software\ATI Technologies\Driver\ddhal\AntiAlias"
  39.  sV1_OnValue="1"      'what is the "ON" value (e.g. "1", "True", "On" etc.)
  40.  sV1_OffValue="0"      'what is the "OFF" value (e.g. "0", "False", "Off" etc.)
  41.  sV1_DataType="1"     'datatype of this value (REG_STRING=1, REG_DWORD=2, REG_BINARY=3, REG_EXPAND_SZ=4)
  42.  
  43.  ' Settings for Value # 2
  44.  sV2_Path="HKEY_LOCAL_MACHINE\Software\ATI Technologies\Driver\ddhal\DitherInit" 
  45.  sV2_OnValue="0"      
  46.  sV2_OffValue="1"      
  47.  sV2_DataType="1"     
  48.  
  49.  ' Settings for Value # 3
  50.  sV3_Path="HKEY_LOCAL_MACHINE\Software\ATI Technologies\CDS\0000\0\ASIC\Motion Compensation" 
  51.  sV3_OnValue="Yes (0x00000001)"      
  52.  sV3_OffValue="No (0x00000000)"      
  53.  sV3_DataType="1"     
  54.  
  55.  ' Settings for Value # 4
  56.  sV4_Path="" 
  57.  sV4_OnValue="1"      
  58.  sV4_OffValue="0"      
  59.  sV4_DataType="2"     
  60.  
  61.  ' Settings for Value # 5
  62.  sV5_Path="" 
  63.  sV5_OnValue="1"      
  64.  sV5_OffValue="0"      
  65.  sV5_DataType="2"     
  66.  
  67. '*** Xteq Systems "On/Off" Plug-in Template ***
  68. '
  69. '-- STOP CHANGES HERE !!
  70.  
  71.  
  72.  
  73. Sub Plugin_Initialize 
  74.  If Len(sCheckPath)>0 then
  75.     if left(sCheckPath,1)<>"\" then sCheckPath=sCheckPath & "\"
  76.  
  77.     b=RegPathExists(sCheckPath)
  78.     if b=true then
  79.        Call ReadSettings
  80.     else
  81.        Call Disable
  82.     end if  
  83.  else
  84.     Call ReadSettings
  85.  end if
  86. End Sub
  87.  
  88. Sub ReadSettings
  89.                            Call ReadSettingsEx(1,sV1_Path,sV1_OnValue)
  90.   if CountSettings>=2 then Call ReadSettingsEx(2,sV2_Path,sV2_OnValue)
  91.   if CountSettings>=3 then Call ReadSettingsEx(3,sV3_Path,sV3_OnValue)
  92.   if CountSettings>=4 then Call ReadSettingsEx(4,sV4_Path,sV4_OnValue)
  93.   if CountSettings>=5 then Call ReadSettingsEx(5,sV5_Path,sV5_OnValue)
  94. End Sub
  95.  
  96. Sub ReadSettingsEx(ID,REGP,VALON)
  97.  s=RegReadValue(REGP)
  98.  'Call DebugMsg("VAL:" & s & " ID:" & ID & " VAL_ON:" & VALON)
  99.  if CStr(s)=VALON then
  100.     Call SetUIElement(ID,true)
  101.  End if 
  102. End Sub
  103.  
  104.  
  105. Sub Plugin_CheckData(ElementIndex)
  106. End Sub
  107.  
  108.  
  109. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  110.                           Call WriteSettings(GetUIElement(1),sV1_Path,sV1_OnValue,sV1_OffValue,sV1_DataType)
  111.  if CountSettings>=2 then Call WriteSettings(GetUIElement(2),sV2_Path,sV2_OnValue,sV2_OffValue,sV2_DataType)
  112.  if CountSettings>=3 then Call WriteSettings(GetUIElement(3),sV3_Path,sV3_OnValue,sV3_OffValue,sV3_DataType)
  113.  if CountSettings>=4 then Call WriteSettings(GetUIElement(4),sV4_Path,sV4_OnValue,sV4_OffValue,sV4_DataType)
  114.  if CountSettings>=5 then Call WriteSettings(GetUIElement(5),sV5_Path,sV5_OnValue,sV5_OffValue,sV5_DataType)
  115.  
  116.  
  117.  if bRequireLogoff then Logoff()
  118.  if bRequireRestart then Restart()
  119. End Sub
  120.  
  121. Sub WriteSettings(CUR_VAL,REGP,ON_VAL,OFF_VAL,DAT_TYPE)
  122.   if CUR_VAL=true then
  123.      Call RegWriteValue(REGP,ON_VAL,DAT_TYPE)
  124.   else
  125.      Call RegWriteValue(REGP,OFF_VAL,DAT_TYPE)
  126.   end if
  127. End Sub
  128.  
  129.  
  130. Sub Plugin_Terminate 
  131. End Sub
  132.  
  133.  
  134.  
  135.